﻿Imports System.ComponentModel
Public Class HocSinhBUS
    Public Sub LoadCBX(ByVal cbx As ComboBox, ByVal sql As String)
        Dim hs_DAO As HocSinhDAO = New HocSinhDAO
        hs_DAO.LoadCombobox(cbx, sql)
    End Sub
    Public Sub LoadDGV(ByVal dgv As DataGridView, ByVal sql As String)
        Dim hs_DAO As HocSinhDAO = New HocSinhDAO
        hs_DAO.LoadGridView(dgv, sql)
    End Sub
    Public Function ThemHocSinh(ByVal hsInsert As HocSinhDTO) As Boolean
        Dim hs_DAO As HocSinhDAO = New HocSinhDAO
        Return hs_DAO.ThemHocSinh(hsInsert)
    End Function
    Public Function XoaHocSinh(ByVal id As String) As Boolean
        Dim hs_DAO As HocSinhDAO = New HocSinhDAO
        Return hs_DAO.XoaHocSinh(id)
    End Function
    Public Function SuaHocSinh(ByVal hsUpdate As HocSinhDTO) As Boolean
        Dim hs_DAO As HocSinhDAO = New HocSinhDAO
        Return hs_DAO.SuaHocSinh(hsUpdate)
    End Function
    Public Function GetList() As BindingList(Of HocSinhDTO)
        Dim hs_DAO As HocSinhDAO = New HocSinhDAO
        Return hs_DAO.GetList()
    End Function
End Class
